; para correr este test ent no debe ser nil 
(SETQ PRG2 '(
	(int i j)
	(int k)
	(main 	(
			(scanf k)
			(FOR ((i = 1) (i < k) (i ++))
				( 
				  (printf "it")
				  (printf i)
				  
				)
			)
			(printf "termina")
			(printf k)
		)
	)
)
)
;debe dar (1 2 3 4 ... 10)
